-- card: 3011 from stack: in -- bmap block id: 4702 -- flags: 4000 -- background id: 2282 -- name: PrŽfŽrences ----- HyperTalk script ----- on openCard setUserLevel the userLevel if card field "Utilisateur" is empty then click at the loc of card field "Utilisateur" pass openCard end openCard on setUserLevel whatLevel set userLevel to whatLevel if the userLevel is whatLevel then put the userLevel into card field "Niveau d'utilisation" set hilite of button "Navigation" to the userLevel = 1 set hilite of button "Texte" to the userLevel = 2 set hilite of button "Dessin" to the userLevel = 3 set hilite of button "Auteur" to the userLevel = 4 set hilite of button "Programmation" to the userLevel = 5 set visible of button "DĂ©placement du curseur" to the userlevel >= 2 set visible of button "Raccourcis" to the userLevel >= 3 set visible of button "Saisie masquĂ©e" to the userLevel = 5 set hilite of button "DĂ©placement du curseur" to the textArrows set hilite of button "Raccourcis" to the powerKeys set hilite of button "Saisie masquĂ©e" to the blindTyping else set hilite of the target to false end if end setUserLevel on closeCard global userName put card field "utilisateur" into userName end closeCard -- part 1 (button) -- low flags: 00 -- high flags: A006 -- rect: left=95 top=145 right=166 bottom=223 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Navigation ----- HyperTalk script ----- on mouseUp setUserLevel 1 end mouseUp -- part 2 (button) -- low flags: 00 -- high flags: E006 -- rect: left=95 top=187 right=208 bottom=223 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Dessin ----- HyperTalk script ----- on mouseUp setUserLevel 3 end mouseUp -- part 3 (button) -- low flags: 00 -- high flags: A006 -- rect: left=95 top=208 right=229 bottom=223 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Auteur ----- HyperTalk script ----- on mouseUp setUserLevel 4 end mouseUp -- part 4 (button) -- low flags: 00 -- high flags: A006 -- rect: left=95 top=229 right=250 bottom=223 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Programmation ----- HyperTalk script ----- on mouseUp setUserLevel 5 end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: A005 -- rect: left=226 top=187 right=208 bottom=329 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Raccourcis ----- HyperTalk script ----- on mouseUp set powerKeys to the hilite of button "Raccourcis" end mouseUp -- part 7 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=173 top=91 right=111 bottom=397 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 14 -- style flags: 0 -- line height: 18 -- part name: Utilisateur ----- HyperTalk script ----- on closeField global userName put card field "Utilisateur" into userName end closeField -- part 8 (button) -- low flags: 00 -- high flags: A006 -- rect: left=95 top=166 right=187 bottom=223 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Texte ----- HyperTalk script ----- on mouseUp setUserLevel 2 end mouseUp -- part 9 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=233 top=124 right=143 bottom=258 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Niveau d'utilisation -- part 21 (button) -- low flags: 00 -- high flags: A005 -- rect: left=226 top=164 right=186 bottom=419 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: DŽplacement du curseur ----- HyperTalk script ----- on mouseUp set textArrows to the hilite of button "DĂ©placement du curseur" end mouseUp -- part 20 (field) -- low flags: 80 -- high flags: 0000 -- rect: left=230 top=125 right=145 bottom=425 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Niveau d'utilisation -- part 13 (button) -- low flags: 80 -- high flags: A005 -- rect: left=226 top=229 right=250 bottom=349 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Saisie masquŽe ----- HyperTalk script ----- on mouseUp set blindTyping to the hilite of button "Saisie masquĂ©e" end mouseUp -- part 19 (field) -- low flags: 81 -- high flags: 2007 -- rect: left=17 top=67 right=320 bottom=486 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Aide de base ----- HyperTalk script ----- on mouseUp hide card field id 19 end mouseUp -- part contents for background part 6 ----- text ----- PrĂ©fĂ©rences -- part contents for card part 9 ----- text ----- 3 -- part contents for card part 19 ----- text ----- La carte PrĂ©fĂ©rences permet de choisir le niveau d'utilisation dans HyperCard. Cinq niveaux sont prĂ©vus : 1. NAVIGATION : navigation basĂ©e sur les menus et boutons. 2. TEXTE : crĂ©ation et modification de texte. 3. DESSIN : crĂ©ation et modification de dessin. 4. AUTEUR : crĂ©ation de boutons, champs et liens. 5. PROGRAMMATION : programmation en langage HyperTalk. ‱ Des "Raccourcis" sont disponibles pour les niveaux 3, 4 et 5. Ils s'appliquent aux fonctions de dessin (par exemple M pour TracĂ© multiple...). Cocher cette case Ă©quivaut Ă  choisir l'article "Raccourcis" dans le menu "Options". ‱ "Saisie masquĂ©e" est uniquement disponible pour le niveau 5. Elle permet de taper un message dans la fenĂȘtre de message lorsqu'elle est masquĂ©e (ainsi vous disposez du plein Ă©cran pour la carte si nĂ©cessaire). ‱ Le niveau d'utilisation peut ĂȘtre modifiĂ© dans le cadre de l'article "ProtĂ©ger la pile" du menu "Fichier" ou en utilisant HyperTalk (par exemple, taper "set userlevel to 2" dans la fenĂȘtre de message d'un script, passera en mode Texte). ‱ Les trois cartes de recherche de la pile de base sont uniquement disponibles pour le niveau 5. -- part contents for card part 20 ----- text ----- 5